install.packages("pwr")
library(pwr)
#pwr.t.test(n = , d = , sig.level = , power = , type = c("two.sample", "one.sample", "paired"))

blah=pwr.t.test( d =0.453554, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.004753, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.2057, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.200035, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.225534, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.288664, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.128497, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.298119, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.012414, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.2714, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.29498, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.059549, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.157613, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.154519, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.151569, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.272284, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.227675, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.283822, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-1, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.323552, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.217961, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.312752, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.389945, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.204947, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.42135, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.423687, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.406786, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.518669, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.440682, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.337483, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.415, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.027531, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.439013, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.43905, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.465346, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.437951, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.299265, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.20681, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.211409, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.296938, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.320782, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.216687, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.098976, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.025, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.277713, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.205441, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.311884, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.327618, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.162172, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.297971, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.323795, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.165699, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.153319, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.022352, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.143439, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.078841, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.120719, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.218524, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.352895, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.332742, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.118418, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.25284, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.163217, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.269113, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.008656, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.370434, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.038317, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.437655, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.39111, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.378843, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.189643, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.628588, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-1, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-1, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.200035, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.402603, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.316209, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.021957, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.029363, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.230014, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.216975, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.020155, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.272284, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.227675, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.337122, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.489722, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.14414, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.316209, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.399335, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.136436, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.190764, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.318041, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.121281, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.268833, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.427284, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.229995, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.082567, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.080362, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.273113, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.055407, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.512061, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.282198, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =0.048667, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.244609, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.186399, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.170353, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)
blah=pwr.t.test( d =-0.122396, sig.level = 0.05, power = 0.80, type = 'two.sample')
print(blah$n)

